/ Amiga Format CD 42 / Amiga Format AFCD42 (Issue 126, Aug 1999).iso / -serious- / programming / basic / newcommandset_v1.80 / examples / gadtools 1.bb2

< prev

next >

view JSON data

view as text

open on a Mac

open on a PC

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 3b 20 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |.; *****|********|
|00000010| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000020| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000030| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 00 3b 20 20 |********|****.;  |
|00000040| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000050| 20 4e 65 77 20 47 61 64 | 54 6f 6f 6c 73 20 4c 69 | New Gad|Tools Li|
|00000060| 62 72 61 72 79 00 3b 20 | 20 20 20 43 6f 64 65 64 |brary.; |   Coded|
|00000070| 20 62 79 20 41 6c 70 68 | 61 53 4f 55 4e 44 20 2d | by Alph|aSOUND -|
|00000080| 20 28 63 29 20 31 39 39 | 39 20 46 61 6e 74 61 69 | (c) 199|9 Fantai|
|00000090| 73 69 65 20 73 6f 66 74 | 77 61 72 65 00 3b 20 2a |sie soft|ware.; *|
|000000a0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000000b0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000000c0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000000d0| 2a 2a 2a 2a 2a 2a 2a 2a | 00 00 3b 20 2a 2a 2a 2a |********|..; ****|
|000000e0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000000f0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000100| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000110| 2a 2a 2a 2a 2a 00 3b 20 | 20 20 20 20 20 20 20 20 |*****.; |        |
|00000120| 20 20 20 20 20 20 20 20 | 20 20 20 20 45 78 61 6d |        |    Exam|
|00000130| 70 6c 65 3a 00 3b 20 20 | 20 20 4f 70 65 6e 20 61 |ple:.;  |  Open a|
|00000140| 6e 20 73 74 61 6e 64 61 | 72 64 20 77 69 6e 64 6f |n standa|rd windo|
|00000150| 77 20 77 69 74 68 20 47 | 61 64 54 6f 6f 6c 20 6d |w with G|adTool m|
|00000160| 65 6e 75 73 20 61 6e 64 | 00 3b 20 20 20 20 20 20 |enus and|.;      |
|00000170| 20 20 20 20 20 20 20 20 | 20 20 67 61 64 67 65 74 |        |  gadget|
|00000180| 73 20 61 74 74 61 63 68 | 65 64 2e 2e 2e 00 3b 20 |s attach|ed....; |
|00000190| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000001a0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000001b0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000001c0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 00 3b 00 3b 20 33 30 |********|*.;.; 30|
|000001d0| 2f 30 31 2f 31 39 39 39 | 3a 00 3b 20 20 20 43 68 |/01/1999|:.;   Ch|
|000001e0| 61 6e 67 65 64 20 74 6f | 20 73 75 70 70 6f 72 74 |anged to| support|
|000001f0| 20 6e 65 77 20 6d 65 6e | 75 20 6c 69 62 72 61 72 | new men|u librar|
|00000200| 79 00 3b 00 3b 20 32 39 | 2f 30 31 2f 31 39 39 39 |y.;.; 29|/01/1999|
|00000210| 3a 00 3b 20 20 20 43 68 | 61 6e 67 65 64 20 74 68 |:.;   Ch|anged th|
|00000220| 65 20 63 6f 64 65 20 74 | 6f 20 77 6f 72 6b 20 77 |e code t|o work w|
|00000230| 69 74 68 20 6e 65 77 20 | 4e 57 69 6e 64 6f 77 2e |ith new |NWindow.|
|00000240| 6c 69 62 72 61 72 79 00 | 3b 20 20 20 41 64 64 65 |library.|;   Adde|
|00000250| 64 20 6e 65 77 20 54 61 | 67 4c 69 73 74 20 73 75 |d new Ta|gList su|
|00000260| 70 70 6f 72 74 2e 00 3b | 20 20 20 53 68 6f 77 20 |pport..;|   Show |
|00000270| 68 6f 77 20 75 73 65 20 | 27 6e 6f 72 6d 61 6c 27 |how use |'normal'|
|00000280| 20 42 6c 69 74 7a 32 20 | 4c 69 73 74 20 77 69 74 | Blitz2 |List wit|
|00000290| 68 20 4e 4c 69 73 74 56 | 69 65 77 28 29 00 3b 00 |h NListV|iew().;.|
|000002a0| 80 c3 00 00 d4 8c 20 20 | 20 30 00 d4 15 20 20 20 |......  | 0...   |
|000002b0| 30 00 d9 9e 20 30 00 da | 89 20 20 20 20 20 30 2c |0... 0..|.     0,|
|000002c0| 20 32 30 00 54 61 67 4c | 69 73 74 2e 6c 20 3d 20 | 20.TagL|ist.l = |
|000002d0| ca 81 28 31 30 29 20 20 | 3b 20 4e 6f 74 65 20 79 |..(10)  |; Note y|
|000002e0| 6f 75 20 63 61 6e 20 75 | 73 65 20 4e 54 61 67 4c |ou can u|se NTagL|
|000002f0| 69 73 74 49 44 20 62 75 | 74 20 75 73 69 6e 67 20 |istID bu|t using |
|00000300| 61 20 76 61 72 69 61 62 | 6c 65 20 69 73 20 73 6d |a variab|le is sm|
|00000310| 61 6c 6c 65 72 2f 66 61 | 73 74 65 72 00 00 00 80 |aller/fa|ster....|
|00000320| 01 2e 4e 4c 56 4c 69 73 | 74 00 20 20 50 61 64 2e |..NLVLis|t.  Pad.|
|00000330| 77 00 20 20 49 74 65 6d | 2e 73 00 80 02 20 80 01 |w.  Item|.s... ..|
|00000340| 00 00 80 04 20 80 b3 20 | 4c 69 73 74 49 74 65 6d |.... .. |ListItem|
|00000350| 2e 4e 4c 56 4c 69 73 74 | 28 32 30 29 00 00 80 16 |.NLVList|(20)....|
|00000360| 20 6b 3d 30 20 80 18 20 | 32 30 00 20 20 80 0b 20 | k=0 .. |20.  .. |
|00000370| c0 02 28 4c 69 73 74 49 | 74 65 6d 28 29 29 00 20 |..(ListI|tem()). |
|00000380| 20 20 20 4c 69 73 74 49 | 74 65 6d 28 29 5c 49 74 |   ListI|tem()\It|
|00000390| 65 6d 20 3d 20 22 49 74 | 65 6d 20 22 2b dd 83 28 |em = "It|em "+..(|
|000003a0| 6b 29 00 20 20 80 c0 00 | 80 17 00 00 00 d4 81 20 |k).  ...|....... |
|000003b0| 30 00 00 3b 00 3b 20 4e | 6f 77 2c 20 63 72 65 61 |0..;.; N|ow, crea|
|000003c0| 74 65 20 61 6c 6c 20 74 | 68 65 20 77 69 6e 64 6f |te all t|he windo|
|000003d0| 77 73 20 67 61 64 67 65 | 74 73 00 3b 00 80 0b 20 |ws gadge|ts.;... |
|000003e0| d9 92 28 30 2c 20 d4 8d | 29 00 00 20 20 61 24 20 |..(0, ..|)..  a$ |
|000003f0| 3d 20 22 48 65 6c 6c 6f | 20 21 22 00 20 20 ca 84 |= "Hello| !".  ..|
|00000400| 20 23 47 54 53 54 5f 4d | 61 78 43 68 61 72 73 2c | #GTST_M|axChars,|
|00000410| 31 30 30 00 20 20 20 20 | 20 20 20 20 ca 83 20 23 |100.    |    .. #|
|00000420| 47 54 53 54 5f 53 74 72 | 69 6e 67 2c 20 26 61 24 |GTST_Str|ing, &a$|
|00000430| 00 20 20 d9 8a 20 31 2c | 20 32 30 30 2c 20 32 35 |.  .. 1,| 200, 25|
|00000440| 2c 20 31 30 30 2c 20 32 | 30 2c 20 22 53 74 72 69 |, 100, 2|0, "Stri|
|00000450| 6e 67 47 61 64 67 65 74 | 22 2c 20 54 61 67 4c 69 |ngGadget|", TagLi|
|00000460| 73 74 00 00 20 20 ca 84 | 20 23 47 54 43 42 5f 53 |st..  ..| #GTCB_S|
|00000470| 63 61 6c 65 64 20 2c 20 | 31 00 20 20 20 20 20 20 |caled , |1.      |
|00000480| 20 20 ca 83 20 23 47 54 | 43 42 5f 43 68 65 63 6b |  .. #GT|CB_Check|
|00000490| 65 64 2c 20 31 00 20 20 | d9 82 20 32 2c 20 32 30 |ed, 1.  |.. 2, 20|
|000004a0| 30 2c 20 35 35 2c 20 32 | 30 2c 20 32 30 2c 20 22 |0, 55, 2|0, 20, "|
|000004b0| 43 68 65 63 6b 42 6f 78 | 20 3f 22 2c 20 54 61 67 |CheckBox| ?", Tag|
|000004c0| 4c 69 73 74 00 00 20 20 | ca 84 20 23 47 54 50 41 |List..  |.. #GTPA|
|000004d0| 5f 44 65 70 74 68 2c 20 | 33 00 20 20 20 20 20 20 |_Depth, |3.      |
|000004e0| 20 20 ca 83 20 23 47 54 | 50 41 5f 49 6e 64 69 63 |  .. #GT|PA_Indic|
|000004f0| 61 74 6f 72 48 65 69 67 | 68 74 2c 20 30 00 20 20 |atorHeig|ht, 0.  |
|00000500| 20 20 20 20 20 20 ca 83 | 20 23 47 54 50 41 5f 43 |      ..| #GTPA_C|
|00000510| 6f 6c 6f 72 2c 20 33 00 | 20 20 20 20 20 20 20 20 |olor, 3.|        |
|00000520| ca 83 20 23 47 54 50 41 | 5f 43 6f 6c 6f 72 4f 66 |.. #GTPA|_ColorOf|
|00000530| 66 73 65 74 2c 20 30 00 | 20 20 d9 87 20 33 2c 20 |fset, 0.|  .. 3, |
|00000540| 31 30 2c 20 31 30 30 2c | 20 33 38 37 2c 20 32 30 |10, 100,| 387, 20|
|00000550| 2c 20 22 50 61 6c 65 74 | 74 65 20 52 65 71 75 65 |, "Palet|te Reque|
|00000560| 73 74 65 72 3a 22 2c 20 | 54 61 67 4c 69 73 74 00 |ster:", |TagList.|
|00000570| 00 20 20 55 6e 64 65 72 | 53 63 6f 72 65 20 3d 20 |.  Under|Score = |
|00000580| 39 35 20 3b 20 4e 41 73 | 63 28 22 5f 22 29 00 20 |95 ; NAs|c("_"). |
|00000590| 20 ca 84 20 23 47 54 5f | 55 6e 64 65 72 73 63 6f | .. #GT_|Undersco|
|000005a0| 72 65 2c 20 55 6e 64 65 | 72 53 63 6f 72 65 00 20 |re, Unde|rScore. |
|000005b0| 20 d9 81 20 34 2c 20 20 | 31 30 2c 20 31 34 30 2c | .. 4,  |10, 140,|
|000005c0| 20 31 30 30 2c 20 32 30 | 2c 20 22 5f 43 6c 69 63 | 100, 20|, "_Clic|
|000005d0| 6b 20 4d 65 20 21 22 2c | 20 54 61 67 4c 69 73 74 |k Me !",| TagList|
|000005e0| 00 20 20 d9 81 20 35 2c | 20 32 39 30 2c 20 31 34 |.  .. 5,| 290, 14|
|000005f0| 30 2c 20 31 30 30 2c 20 | 32 30 2c 20 22 5f 51 75 |0, 100, |20, "_Qu|
|00000600| 69 74 2e 2e 2e 22 20 20 | 20 2c 20 54 61 67 4c 69 |it..."  | , TagLi|
|00000610| 73 74 00 00 20 20 44 61 | 79 31 2e 73 20 3d 20 22 |st..  Da|y1.s = "|
|00000620| 4d 6f 6e 64 61 79 22 00 | 20 20 44 61 79 32 2e 73 |Monday".|  Day2.s|
|00000630| 20 3d 20 22 53 75 6e 64 | 61 79 22 00 20 20 44 61 | = "Sund|ay".  Da|
|00000640| 79 33 2e 73 20 3d 20 22 | 57 65 6e 65 73 64 61 79 |y3.s = "|Wenesday|
|00000650| 22 00 20 20 80 04 20 44 | 61 79 2e 6c 28 33 29 00 |".  .. D|ay.l(3).|
|00000660| 20 20 44 61 79 28 30 29 | 20 3d 20 26 44 61 79 31 |  Day(0)| = &Day1|
|00000670| 00 20 20 44 61 79 28 31 | 29 20 3d 20 26 44 61 79 |.  Day(1|) = &Day|
|00000680| 32 00 20 20 44 61 79 28 | 32 29 20 3d 20 26 44 61 |2.  Day(|2) = &Da|
|00000690| 79 33 00 00 20 20 ca 84 | 20 23 47 54 43 59 5f 4c |y3..  ..| #GTCY_L|
|000006a0| 61 62 65 6c 73 2c 20 26 | 44 61 79 28 30 29 00 20 |abels, &|Day(0). |
|000006b0| 20 20 20 20 20 20 20 ca | 83 20 23 47 54 43 59 5f |       .|. #GTCY_|
|000006c0| 41 63 74 69 76 65 2c 20 | 31 00 20 20 20 20 20 20 |Active, |1.      |
|000006d0| 20 20 ca 83 20 23 47 54 | 5f 55 6e 64 65 72 73 63 |  .. #GT|_Undersc|
|000006e0| 6f 72 65 2c 20 55 6e 64 | 65 72 53 63 6f 72 65 00 |ore, Und|erScore.|
|000006f0| 20 20 d9 86 20 36 2c 20 | 32 39 30 2c 35 30 2c 20 |  .. 6, |290,50, |
|00000700| 31 30 30 2c 20 32 30 2c | 20 22 43 79 63 6c 65 20 |100, 20,| "Cycle |
|00000710| 5f 4d 65 22 2c 20 54 61 | 67 4c 69 73 74 00 00 20 |_Me", Ta|gList.. |
|00000720| 20 ca 84 20 23 47 54 4d | 58 5f 4c 61 62 65 6c 73 | .. #GTM|X_Labels|
|00000730| 2c 20 26 44 61 79 28 30 | 29 00 20 20 20 20 20 20 |, &Day(0|).      |
|00000740| 20 20 ca 83 20 23 47 54 | 4d 58 5f 41 63 74 69 76 |  .. #GT|MX_Activ|
|00000750| 65 2c 20 30 00 20 20 20 | 20 20 20 20 20 ca 83 20 |e, 0.   |     .. |
|00000760| 23 47 54 4d 58 5f 53 70 | 61 63 69 6e 67 2c 20 34 |#GTMX_Sp|acing, 4|
|00000770| 00 20 20 d9 8d 20 23 50 | 4c 41 43 45 54 45 58 54 |.  .. #P|LACETEXT|
|00000780| 5f 52 49 47 48 54 00 20 | 20 d9 9f 20 37 2c 20 31 |_RIGHT. | .. 7, 1|
|00000790| 30 2c 20 33 30 2c 20 31 | 30 30 2c 20 32 30 2c 20 |0, 30, 1|00, 20, |
|000007a0| 22 22 2c 20 54 61 67 4c | 69 73 74 00 00 00 20 20 |"", TagL|ist...  |
|000007b0| 61 24 20 3d 20 22 25 32 | 6c 64 22 00 20 20 ca 84 |a$ = "%2|ld".  ..|
|000007c0| 20 23 47 54 53 4c 5f 4d | 69 6e 2c 20 30 00 20 20 | #GTSL_M|in, 0.  |
|000007d0| 20 20 20 20 20 20 ca 83 | 20 23 47 54 53 4c 5f 4d |      ..| #GTSL_M|
|000007e0| 61 78 2c 20 32 35 35 00 | 20 20 20 20 20 20 20 20 |ax, 255.|        |
|000007f0| ca 83 20 23 47 54 53 4c | 5f 4c 65 76 65 6c 2c 20 |.. #GTSL|_Level, |
|00000800| 73 6c 69 64 65 72 6c 65 | 76 65 6c 00 20 20 20 20 |sliderle|vel.    |
|00000810| 20 20 20 20 ca 83 20 23 | 47 54 53 4c 5f 4c 65 76 |    .. #|GTSL_Lev|
|00000820| 65 6c 46 6f 72 6d 61 74 | 2c 20 26 61 24 00 20 20 |elFormat|, &a$.  |
|00000830| 20 20 20 20 20 20 ca 83 | 20 23 47 54 53 4c 5f 4c |      ..| #GTSL_L|
|00000840| 65 76 65 6c 50 6c 61 63 | 65 2c 20 23 50 4c 41 43 |evelPlac|e, #PLAC|
|00000850| 45 54 45 58 54 5f 52 49 | 47 48 54 00 20 20 20 20 |ETEXT_RI|GHT.    |
|00000860| 20 20 20 20 ca 83 20 23 | 47 54 53 4c 5f 4d 61 78 |    .. #|GTSL_Max|
|00000870| 4c 65 76 65 6c 4c 65 6e | 2c 20 33 00 20 20 20 20 |LevelLen|, 3.    |
|00000880| 20 20 20 20 ca 83 20 23 | 47 41 5f 49 6d 6d 65 64 |    .. #|GA_Immed|
|00000890| 69 61 74 65 2c 20 31 00 | 20 20 d9 89 20 38 2c 20 |iate, 1.|  .. 8, |
|000008a0| 31 30 2c 20 31 32 35 2c | 20 33 30 30 2c 20 31 30 |10, 125,| 300, 10|
|000008b0| 2c 20 22 22 2c 20 54 61 | 67 4c 69 73 74 00 00 00 |, "", Ta|gList...|
|000008c0| 20 20 61 24 20 3d 20 22 | 25 32 6c 64 22 00 20 20 |  a$ = "|%2ld".  |
|000008d0| ca 84 20 23 47 54 53 4c | 5f 4d 69 6e 2c 20 30 00 |.. #GTSL|_Min, 0.|
|000008e0| 20 20 20 20 20 20 20 20 | ca 83 20 23 47 54 53 4c |        |.. #GTSL|
|000008f0| 5f 4d 61 78 2c 20 32 35 | 35 00 20 20 20 20 20 20 |_Max, 25|5.      |
|00000900| 20 20 ca 83 20 23 47 54 | 53 4c 5f 4c 65 76 65 6c |  .. #GT|SL_Level|
|00000910| 2c 20 73 6c 69 64 65 72 | 6c 65 76 65 6c 00 20 20 |, slider|level.  |
|00000920| 20 20 20 20 20 20 ca 83 | 20 23 47 54 53 4c 5f 4c |      ..| #GTSL_L|
|00000930| 65 76 65 6c 46 6f 72 6d | 61 74 2c 20 26 61 24 00 |evelForm|at, &a$.|
|00000940| 20 20 20 20 20 20 20 20 | ca 83 20 23 47 54 53 4c |        |.. #GTSL|
|00000950| 5f 4c 65 76 65 6c 50 6c | 61 63 65 2c 20 23 50 4c |_LevelPl|ace, #PL|
|00000960| 41 43 45 54 45 58 54 5f | 52 49 47 48 54 00 20 20 |ACETEXT_|RIGHT.  |
|00000970| 20 20 20 20 20 20 ca 83 | 20 23 47 54 53 4c 5f 4d |      ..| #GTSL_M|
|00000980| 61 78 4c 65 76 65 6c 4c | 65 6e 2c 20 33 00 20 20 |axLevelL|en, 3.  |
|00000990| 20 20 20 20 20 20 ca 83 | 20 23 47 41 5f 49 6d 6d |      ..| #GA_Imm|
|000009a0| 65 64 69 61 74 65 2c 20 | 31 00 20 20 d9 89 20 38 |ediate, |1.  .. 8|
|000009b0| 2c 20 31 30 2c 20 31 32 | 35 2c 20 33 30 30 2c 20 |, 10, 12|5, 300, |
|000009c0| 31 30 2c 20 22 22 2c 20 | 54 61 67 4c 69 73 74 00 |10, "", |TagList.|
|000009d0| 00 20 20 c0 01 20 4c 69 | 73 74 49 74 65 6d 28 29 |.  .. Li|stItem()|
|000009e0| 00 20 20 2a 4d 79 4c 69 | 73 74 2e 4e 6f 64 65 20 |.  *MyLi|st.Node |
|000009f0| 3d 20 4c 69 73 74 49 74 | 65 6d 28 29 20 2d 20 38 |= ListIt|em() - 8|
|00000a00| 00 20 20 2a 52 65 61 6c | 4c 69 73 74 20 3d 20 2a |.  *Real|List = *|
|00000a10| 4d 79 4c 69 73 74 5c 6c | 6e 5f 50 72 65 64 00 00 |MyList\l|n_Pred..|
|00000a20| 20 20 ca 84 20 23 47 54 | 4c 56 5f 4c 61 62 65 6c |  .. #GT|LV_Label|
|00000a30| 73 2c 20 2a 52 65 61 6c | 4c 69 73 74 00 20 20 d9 |s, *Real|List.  .|
|00000a40| 8d 20 23 50 4c 41 43 45 | 54 45 58 54 5f 41 42 4f |. #PLACE|TEXT_ABO|
|00000a50| 56 45 00 20 20 d9 84 20 | 39 2c 20 34 32 30 2c 20 |VE.  .. |9, 420, |
|00000a60| 33 35 2c 20 31 30 30 2c | 20 31 32 30 2c 20 22 4e |35, 100,| 120, "N|
|00000a70| 4c 69 73 74 56 69 65 77 | 3a 22 2c 20 54 61 67 4c |ListView|:", TagL|
|00000a80| 69 73 74 00 00 80 c0 00 | 00 3b 00 3b 20 4c 65 74 |ist.....|.;.; Let|
|00000a90| 27 73 20 63 72 65 61 74 | 65 20 6f 75 72 20 6f 77 |'s creat|e our ow|
|00000aa0| 6e 20 6d 65 6e 75 73 20 | 70 6c 65 61 73 65 2e 2e |n menus |please..|
|00000ab0| 2e 00 3b 00 00 53 68 6f | 72 74 31 2e 73 20 3d 20 |..;..Sho|rt1.s = |
|00000ac0| 22 4f 22 00 53 68 6f 72 | 74 32 2e 73 20 3d 20 22 |"O".Shor|t2.s = "|
|00000ad0| 53 22 00 53 68 6f 72 74 | 33 2e 73 20 3d 20 22 51 |S".Short|3.s = "Q|
|00000ae0| 22 00 00 4e 62 4c 61 6e | 67 20 3d 20 31 32 00 80 |"..NbLan|g = 12..|
|00000af0| 04 20 4c 61 6e 67 24 28 | 4e 62 4c 61 6e 67 29 00 |. Lang$(|NbLang).|
|00000b00| 00 80 16 20 6b 3d 30 20 | 80 18 20 4e 62 4c 61 6e |... k=0 |.. NbLan|
|00000b10| 67 00 20 20 80 1b 20 4c | 61 6e 67 24 28 6b 29 00 |g.  .. L|ang$(k).|
|00000b20| 80 17 00 00 da 81 20 26 | 4c 61 6e 67 24 28 30 29 |...... &|Lang$(0)|
|00000b30| 00 20 20 da 82 20 31 2c | 20 26 4c 61 6e 67 24 28 |.  .. 1,| &Lang$(|
|00000b40| 31 29 2c 20 26 53 68 6f | 72 74 31 00 20 20 da 82 |1), &Sho|rt1.  ..|
|00000b50| 20 32 2c 20 26 4c 61 6e | 67 24 28 32 29 2c 20 26 | 2, &Lan|g$(2), &|
|00000b60| 53 68 6f 72 74 32 00 20 | 20 da 84 00 20 20 da 82 |Short2. | ...  ..|
|00000b70| 20 33 2c 20 26 4c 61 6e | 67 24 28 33 29 2c 20 26 | 3, &Lan|g$(3), &|
|00000b80| 53 68 6f 72 74 33 00 00 | da 81 20 26 4c 61 6e 67 |Short3..|.. &Lang|
|00000b90| 24 28 34 29 00 20 20 da | 8b 20 20 20 34 2c 20 26 |$(4).  .|.   4, &|
|00000ba0| 4c 61 6e 67 24 28 35 29 | 2c 20 30 2c 20 30 00 20 |Lang$(5)|, 0, 0. |
|00000bb0| 20 da 8d 20 20 35 2c 20 | 26 4c 61 6e 67 24 28 36 | ..  5, |&Lang$(6|
|00000bc0| 29 2c 20 30 2c 20 30 00 | 20 20 da 8d 20 20 36 2c |), 0, 0.|  ..  6,|
|00000bd0| 20 26 4c 61 6e 67 24 28 | 37 29 2c 20 30 2c 20 30 | &Lang$(|7), 0, 0|
|00000be0| 00 20 20 da 8d 20 20 37 | 2c 20 26 4c 61 6e 67 24 |.  ..  7|, &Lang$|
|00000bf0| 28 38 29 2c 20 30 2c 20 | 31 00 20 20 da 8b 20 20 |(8), 0, |1.  ..  |
|00000c00| 20 31 31 2c 20 26 4c 61 | 6e 67 24 28 35 29 2c 20 | 11, &La|ng$(5), |
|00000c10| 30 2c 20 30 00 20 20 da | 8d 20 20 31 32 2c 20 26 |0, 0.  .|.  12, &|
|00000c20| 4c 61 6e 67 24 28 36 29 | 2c 20 30 2c 20 30 00 20 |Lang$(6)|, 0, 0. |
|00000c30| 20 da 8d 20 20 31 33 2c | 20 26 4c 61 6e 67 24 28 | ..  13,| &Lang$(|
|00000c40| 37 29 2c 20 30 2c 20 31 | 00 20 20 da 8d 20 20 31 |7), 0, 1|.  ..  1|
|00000c50| 34 2c 20 26 4c 61 6e 67 | 24 28 38 29 2c 20 30 2c |4, &Lang|$(8), 0,|
|00000c60| 20 30 00 00 da 81 20 26 | 4c 61 6e 67 24 28 39 29 | 0.... &|Lang$(9)|
|00000c70| 00 20 20 da 82 20 38 2c | 20 26 4c 61 6e 67 24 28 |.  .. 8,| &Lang$(|
|00000c80| 31 30 29 2c 20 30 00 20 | 20 20 20 da 83 20 39 2c |10), 0. |   .. 9,|
|00000c90| 20 26 4c 61 6e 67 24 28 | 31 31 29 2c 20 30 00 20 | &Lang$(|11), 0. |
|00000ca0| 20 20 20 da 85 00 20 20 | 20 20 da 83 20 31 30 2c |   ...  |  .. 10,|
|00000cb0| 20 26 4c 61 6e 67 24 28 | 31 32 29 2c 20 30 00 00 | &Lang$(|12), 0..|
|00000cc0| da 88 20 33 00 00 da 86 | 20 30 2c 20 d4 8d 00 00 |.. 3....| 0, ....|
|00000cd0| 00 3b 00 3b 20 4f 70 65 | 6e 20 6f 75 72 20 77 69 |.;.; Ope|n our wi|
|00000ce0| 6e 64 6f 77 20 61 6e 64 | 20 61 74 74 61 63 68 20 |ndow and| attach |
|00000cf0| 67 61 64 67 65 74 73 20 | 26 20 6d 65 6e 75 73 2e |gadgets |& menus.|
|00000d00| 2e 00 3b 00 00 57 69 6e | 54 69 74 6c 65 24 20 3d |..;..Win|Title$ =|
|00000d10| 20 22 4e 47 61 64 54 6f | 6f 6c 73 20 65 78 61 6d | "NGadTo|ols exam|
|00000d20| 70 6c 65 22 00 00 23 49 | 44 43 4d 50 32 20 3d 20 |ple"..#I|DCMP2 = |
|00000d30| 23 49 44 43 4d 50 5f 4d | 4f 55 53 45 42 55 54 54 |#IDCMP_M|OUSEBUTT|
|00000d40| 4f 4e 53 20 7c 20 23 49 | 44 43 4d 50 5f 56 41 4e |ONS | #I|DCMP_VAN|
|00000d50| 49 4c 4c 41 4b 45 59 20 | 7c 20 23 49 44 43 4d 50 |ILLAKEY || #IDCMP|
|00000d60| 5f 43 4c 4f 53 45 57 49 | 4e 44 4f 57 20 7c 20 23 |_CLOSEWI|NDOW | #|
|00000d70| 49 44 43 4d 50 5f 47 41 | 44 47 45 54 55 50 00 00 |IDCMP_GA|DGETUP..|
|00000d80| ca 84 20 23 57 41 5f 46 | 6c 61 67 73 2c 20 23 57 |.. #WA_F|lags, #W|
|00000d90| 46 4c 47 5f 43 4c 4f 53 | 45 47 41 44 47 45 54 20 |FLG_CLOS|EGADGET |
|00000da0| 7c 20 23 57 46 4c 47 5f | 44 52 41 47 42 41 52 20 || #WFLG_|DRAGBAR |
|00000db0| 7c 20 23 57 46 4c 47 5f | 44 45 50 54 48 47 41 44 || #WFLG_|DEPTHGAD|
|00000dc0| 47 45 54 20 7c 20 23 57 | 46 4c 47 5f 41 43 54 49 |GET | #W|FLG_ACTI|
|00000dd0| 56 41 54 45 00 20 20 20 | 20 20 20 ca 83 20 23 57 |VATE.   |   .. #W|
|00000de0| 41 5f 54 69 74 6c 65 2c | 20 26 57 69 6e 54 69 74 |A_Title,| &WinTit|
|00000df0| 6c 65 24 00 20 20 20 20 | 20 20 ca 83 20 23 57 41 |le$.    |  .. #WA|
|00000e00| 5f 49 44 43 4d 50 2c 20 | 20 23 49 44 43 4d 50 32 |_IDCMP, | #IDCMP2|
|00000e10| 20 7c 20 23 49 44 43 4d | 50 5f 47 41 44 47 45 54 | | #IDCM|P_GADGET|
|00000e20| 44 4f 57 4e 20 7c 20 23 | 49 44 43 4d 50 5f 4d 45 |DOWN | #|IDCMP_ME|
|00000e30| 4e 55 50 49 43 4b 20 7c | 20 23 49 44 43 4d 50 5f |NUPICK || #IDCMP_|
|00000e40| 4d 4f 55 53 45 4d 4f 56 | 45 00 20 20 20 20 20 20 |MOUSEMOV|E.      |
|00000e50| ca 83 20 23 57 41 5f 43 | 75 73 74 6f 6d 53 63 72 |.. #WA_C|ustomScr|
|00000e60| 65 65 6e 2c 20 d4 8d 00 | 20 20 20 20 20 20 ca 83 |een, ...|      ..|
|00000e70| 20 23 57 41 5f 4e 65 77 | 4c 6f 6f 6b 4d 65 6e 75 | #WA_New|LookMenu|
|00000e80| 73 2c 20 31 00 00 80 0b | 20 d4 01 28 30 2c 20 32 |s, 1....| ..(0, 2|
|00000e90| 30 2c 20 36 36 2c 20 35 | 34 30 2c 20 31 35 35 2c |0, 66, 5|40, 155,|
|00000ea0| 20 54 61 67 4c 69 73 74 | 29 00 00 20 20 ca 82 00 | TagList|)..  ...|
|00000eb0| 00 20 20 d9 93 20 30 2c | 20 d4 16 00 20 20 da 87 |.  .. 0,| ...  ..|
|00000ec0| 20 30 2c 20 d4 16 00 00 | 20 20 80 bb 00 00 20 20 | 0, ....|  ....  |
|00000ed0| 20 20 49 44 43 4d 50 2e | 6c 20 3d 20 d4 04 00 00 |  IDCMP.|l = ....|
|00000ee0| 20 20 20 20 45 76 65 6e | 74 49 44 20 3d 20 d4 19 |    Even|tID = ..|
|00000ef0| 00 20 20 20 20 43 6f 64 | 65 20 20 20 20 3d 20 d4 |.    Cod|e    = .|
|00000f00| 18 00 00 20 20 20 20 80 | 0b 20 49 44 43 4d 50 20 |...    .|. IDCMP |
|00000f10| 3d 20 23 49 44 43 4d 50 | 5f 47 41 44 47 45 54 55 |= #IDCMP|_GADGETU|
|00000f20| 50 20 80 8a 20 49 44 43 | 4d 50 20 3d 20 23 49 44 |P .. IDC|MP = #ID|
|00000f30| 43 4d 50 5f 47 41 44 47 | 45 54 44 4f 57 4e 20 3b |CMP_GADG|ETDOWN ;|
|00000f40| 20 41 20 67 61 64 67 65 | 74 20 68 61 73 20 62 65 | A gadge|t has be|
|00000f50| 65 6e 20 70 75 73 68 65 | 64 00 00 20 20 20 20 20 |en pushe|d..     |
|00000f60| 20 80 0e 20 45 76 65 6e | 74 49 44 00 20 20 20 20 | .. Even|tID.    |
|00000f70| 20 20 20 20 80 0f 20 31 | 00 20 20 20 20 20 20 20 |    .. 1|.       |
|00000f80| 20 20 20 dd 82 20 20 22 | 53 74 72 69 6e 67 20 67 |   ..  "|String g|
|00000f90| 61 64 67 65 74 20 6d 6f | 64 69 66 69 65 64 3a 20 |adget mo|dified: |
|00000fa0| 22 2c 20 d9 8f 28 31 29 | 00 20 20 20 20 20 20 20 |", ..(1)|.       |
|00000fb0| 20 20 20 d9 a1 20 32 2c | 30 00 00 20 20 20 20 20 |   .. 2,|0..     |
|00000fc0| 20 20 20 80 0f 20 32 00 | 20 20 20 20 20 20 20 20 |   .. 2.|        |
|00000fd0| 20 20 dd 82 20 20 22 43 | 68 65 63 6b 42 6f 78 20 |  ..  "C|heckBox |
|00000fe0| 67 61 64 67 65 74 20 70 | 75 73 68 65 64 2e 20 53 |gadget p|ushed. S|
|00000ff0| 74 61 74 65 3a 20 22 2c | 20 43 6f 64 65 00 20 20 |tate: ",| Code.  |
|00001000| 20 20 20 20 20 20 20 20 | d9 a2 20 31 00 20 20 20 |        |.. 1.   |
|00001010| 20 20 20 20 20 20 20 d9 | a1 20 20 32 2c 31 00 00 |       .|.  2,1..|
|00001020| 20 20 20 20 20 20 20 20 | 80 0f 20 33 00 20 20 20 |        |.. 3.   |
|00001030| 20 20 20 20 20 20 20 dd | 82 20 20 22 50 61 6c 65 |       .|.  "Pale|
|00001040| 74 74 65 20 67 61 64 67 | 65 74 20 70 75 73 68 65 |tte gadg|et pushe|
|00001050| 64 2e 20 43 6f 6c 6f 75 | 72 20 63 68 6f 6f 73 65 |d. Colou|r choose|
|00001060| 6e 3a 20 22 2c 20 43 6f | 64 65 00 00 20 20 20 20 |n: ", Co|de..    |
|00001070| 20 20 20 20 80 0f 20 34 | 00 20 20 20 20 20 20 20 |    .. 4|.       |
|00001080| 20 20 20 dd 82 20 20 22 | 47 72 65 61 74 20 21 22 |   ..  "|Great !"|
|00001090| 00 00 20 20 20 20 20 20 | 20 20 80 0f 20 35 00 20 |..      |  .. 5. |
|000010a0| 20 20 20 20 20 20 20 20 | 20 49 44 43 4d 50 20 3d |        | IDCMP =|
|000010b0| 20 23 49 44 43 4d 50 5f | 43 4c 4f 53 45 57 49 4e | #IDCMP_|CLOSEWIN|
|000010c0| 44 4f 57 00 00 20 20 20 | 20 20 20 20 20 80 0f 20 |DOW..   |     .. |
|000010d0| 36 00 20 20 20 20 20 20 | 20 20 20 20 dd 82 20 22 |6.      |    .. "|
|000010e0| 43 79 63 6c 65 20 47 61 | 64 67 65 74 20 50 75 73 |Cycle Ga|dget Pus|
|000010f0| 68 65 64 3a 20 22 2c 20 | 43 6f 64 65 00 00 20 20 |hed: ", |Code..  |
|00001100| 20 20 20 20 20 20 80 0f | 20 37 00 20 20 20 20 20 |      ..| 7.     |
|00001110| 20 20 20 20 20 dd 82 20 | 22 52 61 64 69 6f 20 47 |     .. |"Radio G|
|00001120| 61 64 67 65 74 20 70 75 | 73 68 65 64 3a 20 22 2c |adget pu|shed: ",|
|00001130| 20 43 6f 64 65 00 00 20 | 20 20 20 20 20 20 20 80 | Code.. |       .|
|00001140| 0f 20 38 00 20 20 20 20 | 20 20 20 20 20 20 dd 82 |. 8.    |      ..|
|00001150| 20 22 43 6f 6f 4c 20 3a | 20 22 2c 20 43 6f 64 65 | "CooL :| ", Code|
|00001160| 00 00 20 20 20 20 20 20 | 20 20 80 0f 20 39 00 20 |..      |  .. 9. |
|00001170| 20 20 20 20 20 20 20 20 | 20 dd 82 20 22 4c 69 73 |        | .. "Lis|
|00001180| 74 56 69 65 77 3a 20 22 | 2c 20 43 6f 64 65 00 00 |tView: "|, Code..|
|00001190| 20 20 20 20 20 20 80 02 | 20 80 0e 00 20 20 20 20 |      ..| ...    |
|000011a0| 80 c0 00 00 20 20 20 20 | 80 0b 20 49 44 43 4d 50 |....    |.. IDCMP|
|000011b0| 20 3d 20 23 49 44 43 4d | 50 5f 4d 4f 55 53 45 4d | = #IDCM|P_MOUSEM|
|000011c0| 4f 56 45 00 20 20 20 20 | 20 20 80 0b 20 45 76 65 |OVE.    |  .. Eve|
|000011d0| 6e 74 49 44 20 3d 20 38 | 00 20 20 20 20 20 20 20 |ntID = 8|.       |
|000011e0| 20 dd 82 20 22 53 6c 69 | 64 65 72 20 3a 20 22 2c | .. "Sli|der : ",|
|000011f0| 20 43 6f 64 65 00 20 20 | 20 20 20 20 80 c0 00 20 | Code.  |    ... |
|00001200| 20 20 20 80 c0 00 00 20 | 20 20 20 80 0b 20 49 44 |   .... |   .. ID|
|00001210| 43 4d 50 20 3d 20 23 49 | 44 43 4d 50 5f 4d 45 4e |CMP = #I|DCMP_MEN|
|00001220| 55 50 49 43 4b 00 20 20 | 20 20 20 20 80 0e 20 45 |UPICK.  |    .. E|
|00001230| 76 65 6e 74 49 44 00 20 | 20 20 20 20 20 20 20 80 |ventID. |       .|
|00001240| 0f 20 33 20 3b 20 51 75 | 69 74 2e 2e 2e 00 20 20 |. 3 ; Qu|it....  |
|00001250| 20 20 20 20 20 20 20 20 | 49 44 43 4d 50 20 3d 20 |        |IDCMP = |
|00001260| 23 49 44 43 4d 50 5f 43 | 4c 4f 53 45 57 49 4e 44 |#IDCMP_C|LOSEWIND|
|00001270| 4f 57 20 20 3b 20 51 75 | 69 74 20 71 75 69 63 6b |OW  ; Qu|it quick|
|00001280| 6c 79 20 74 68 69 73 20 | 70 72 6f 67 72 61 6d 2e |ly this |program.|
|00001290| 2e 00 00 20 20 20 20 20 | 20 20 20 80 10 00 20 20 |...     |   ...  |
|000012a0| 20 20 20 20 20 20 20 20 | dd 82 20 22 4d 65 6e 75 |        |.. "Menu|
|000012b0| 20 68 61 73 20 62 65 65 | 6e 20 68 69 74 74 65 64 | has bee|n hitted|
|000012c0| 3a 20 22 2c 20 45 76 65 | 6e 74 49 44 00 20 20 20 |: ", Eve|ntID.   |
|000012d0| 20 20 20 80 02 20 80 0e | 00 00 20 20 20 20 80 c0 |   .. ..|..    ..|
|000012e0| 00 00 20 20 80 bc 20 49 | 44 43 4d 50 20 3d 20 23 |..  .. I|DCMP = #|
|000012f0| 49 44 43 4d 50 5f 43 4c | 4f 53 45 57 49 4e 44 4f |IDCMP_CL|OSEWINDO|
|00001300| 57 00 00 80 c0 00 00 80 | 02 00 00 80 1a 2e 73 20 |W.......|......s |
|00001310| 22 50 72 6f 6a 65 63 74 | 22 2c 20 22 4f 70 65 6e |"Project|", "Open|
|00001320| 22 2c 20 22 53 61 76 65 | 22 2c 20 22 51 75 69 74 |", "Save|", "Quit|
|00001330| 22 00 80 1a 2e 73 20 22 | 54 6f 6f 6c 73 22 2c 20 |"....s "|Tools", |
|00001340| 22 43 68 65 63 6b 20 4d | 65 22 2c 20 22 4d 58 20 |"Check M|e", "MX |
|00001350| 30 22 2c 20 22 4d 58 20 | 31 22 2c 20 22 4d 58 20 |0", "MX |1", "MX |
|00001360| 32 22 00 80 1a 2e 73 20 | 22 49 6d 61 67 65 22 2c |2"....s |"Image",|
|00001370| 20 22 52 6f 74 61 74 65 | 22 2c 20 22 58 22 2c 20 | "Rotate|", "X", |
|00001380| 22 59 22 00 00          |                         |"Y"..   |        |
+--------+-------------------------+-------------------------+--------+--------+